home *** CD-ROM | disk | FTP | other *** search
/ Sprite 1984 - 1993 / Sprite 1984 - 1993.iso / src / lib / c / sync / sun3.md / RCS / Sync_GetLock.s,v < prev    next >
Text File  |  1990-02-12  |  3KB  |  124 lines
  1. head     1.2;
  2. branch   ;
  3. access   ;
  4. symbols  ;
  5. locks    ; strict;
  6. comment  @# @;
  7.  
  8.  
  9. 1.2
  10. date     90.02.12.02.52.36;  author rab;  state Exp;
  11. branches ;
  12. next     1.1;
  13.  
  14. 1.1
  15. date     88.06.19.14.34.17;  author ouster;  state Exp;
  16. branches ;
  17. next     ;
  18.  
  19.  
  20. desc
  21. @@
  22.  
  23.  
  24. 1.2
  25. log
  26. @Converted local labels to Gnu syntax.
  27. @
  28. text
  29. @|*
  30. |* syncAsm.s --
  31. |*
  32. |*    Source code for the Sync_GetLock library procedure.
  33. |*
  34. |* Copyright 1988 Regents of the University of California
  35. |* Permission to use, copy, modify, and distribute this
  36. |* software and its documentation for any purpose and without
  37. |* fee is hereby granted, provided that the above copyright
  38. |* notice appear in all copies.  The University of California
  39. |* makes no representations about the suitability of this
  40. |* software for any purpose.  It is provided "as is" without
  41. |* express or implied warranty.
  42. |*
  43.  
  44.     .data
  45.     .asciz "$Header: /sprite/src/lib/c/sync/sun3.md/RCS/Sync_GetLock.s,v 1.1 88/06/19 14:34:17 ouster Exp Locker: rab $ SPRITE (Berkeley)"
  46.     .even
  47.     .text
  48.  
  49.  
  50. /*
  51.  * ----------------------------------------------------------------------------
  52.  *
  53.  * Sync_GetLock --
  54.  *
  55.  *    Acquire a lock.  Other processes trying to acquire the lock
  56.  *    will block until this lock is released.
  57.  *
  58.  *      A critical section of code is protected by a lock.  To safely
  59.  *      execute the code, the caller must first call Sync_GetLock to
  60.  *      acquire the lock on the critical section.  At the end of the
  61.  *      critical section the caller has to call Sync_Unlock to release
  62.  *      the lock and allow other processes to execute in the critical
  63.  *      section.
  64.  *
  65.  * Results:
  66.  *    None.
  67.  *
  68.  * Side effects:
  69.  *      The lock is set.  Other processes will be blocked if they try
  70.  *      to lock the same lock.  A blocked process will try to get the
  71.  *      lock after this process unlocks the lock with Sync_Unlock.
  72.  *
  73.  * C equivalent:
  74.  *
  75.  *    void
  76.  *    Sync_GetLock(lockPtr)
  77.  *       Sync_Lock *lockPtr;
  78.  *    {
  79.  *        if (Sun_TestAndSet(&(lockPtr->inUse)) != 0) {
  80.  *        Sync_SlowLock(lockPtr); 
  81.  *        }
  82.  *    }
  83.  *
  84.  *----------------------------------------------------------------------
  85.  */
  86.  
  87.     .text
  88.     .globl _Sync_GetLock
  89. _Sync_GetLock:
  90.  
  91.     movl    sp@@(4), a0    | Move address of lockPtr->inUse to a0.
  92.  
  93.     /*
  94.      * This TestAndSet races with the assignment statement in Sync_Unlock
  95.      * that clears the inUse bit.  The worst case is that we incorrectly
  96.      * assume the lock is taken just as someone clears this bit.  This is
  97.      * ok because we'll call Sync_SlowLock which does the check again
  98.      * inside a protected critical section.
  99.      */
  100.  
  101.     tas        a0@@        | Test and set the inUse flag.
  102.     beq        1f        | If it wasn't set then just return.
  103.  
  104.     jra        _Sync_SlowLock | If it was set then we must do a slow lock.
  105. 1:  rts
  106. @
  107.  
  108.  
  109. 1.1
  110. log
  111. @Initial revision
  112. @
  113. text
  114. @d17 1
  115. a17 1
  116.     .asciz "$Header: proto.s,v 1.2 88/03/11 08:39:36 ouster Exp $ SPRITE (Berkeley)"
  117. d74 1
  118. a74 1
  119.     beq        1$        | If it wasn't set then just return.
  120. d77 1
  121. a77 1
  122. 1$: rts
  123. @
  124.